home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1992 June: ROMin Holiday / ADC Developer CD (1992-06) (''ROMin Holiday'')_iso / Developer Connection - 06-1992.iso / Developer Essentials / MPW Interfaces & Libraries / PInterfaces / Finder.p < prev    next >
Encoding:
Text File  |  1992-01-29  |  1.8 KB  |  84 lines  |  [TEXT/MPS ]
  1.  
  2. {
  3. Created: Tuesday, November 26, 1991 at 11:43 AM
  4.  Finder.p
  5.  Pascal Interface to the Macintosh Libraries
  6.  
  7.   Copyright Apple Computer, Inc. 1990-1991
  8.   All rights reserved
  9. }
  10.  
  11.  
  12. {$IFC UNDEFINED UsingIncludes}
  13. {$SETC UsingIncludes := 0}
  14. {$ENDC}
  15.  
  16. {$IFC NOT UsingIncludes}
  17.  UNIT Finder;
  18.  INTERFACE
  19. {$ENDC}
  20.  
  21. {$IFC UNDEFINED UsingFinder}
  22. {$SETC UsingFinder := 1}
  23.  
  24.  
  25. CONST
  26.  
  27. { make only the following consts avaiable to resource files that include this file }
  28. kCustomIconResource = -16455;            { Custom icon family resource ID }
  29.  
  30. kContainerFolderAliasType = 'fdrp';        { type for folder aliases }
  31. kContainerTrashAliasType = 'trsh';        { type for trash folder aliases }
  32. kContainerHardDiskAliasType = 'hdsk';    { type for hard disk aliases }
  33. kContainerFloppyAliasType = 'flpy';        { type for floppy aliases }
  34. kContainerServerAliasType = 'srvr';        { type for server aliases }
  35. kApplicationAliasType = 'adrp';            { type for application aliases }
  36. kContainerAliasType = 'drop';            { type for all other containers }
  37.  
  38. { type for Special folder aliases }
  39. kSystemFolderAliasType = 'fasy';
  40. kAppleMenuFolderAliasType = 'faam';
  41. kStartupFolderAliasType = 'fast';
  42. kPrintMonitorDocsFolderAliasType = 'fapn';
  43. kPreferencesFolderAliasType = 'fapf';
  44. kControlPanelFolderAliasType = 'fact';
  45. kExtensionFolderAliasType = 'faex';
  46.  
  47. { type for AppleShare folder aliases }
  48. kExportedFolderAliasType = 'faet';
  49. kDropFolderAliasType = 'fadr';
  50. kSharedFolderAliasType = 'fash';
  51. kMountedFolderAliasType = 'famn';
  52.  
  53.  
  54. {Finder Flags}
  55. kIsOnDesk = $1;
  56. kColor = $E;
  57.  
  58. {kColorReserved = $10
  59. kRequiresSwitchLaunch = $20}
  60.  
  61. kIsShared = $40;
  62.  
  63. {kHasNoINITs = $80}
  64.  
  65. kHasBeenInited = $100;
  66.  
  67. {kReserved = $200}
  68.  
  69. kHasCustomIcon = $400;
  70. kIsStationary = $800;
  71. kNameLocked = $1000;
  72. kHasBundle = $2000;
  73. kIsInvisible = $4000;
  74. kIsAlias = $8000;
  75.  
  76.  
  77.  
  78. {$ENDC} { UsingFinder }
  79.  
  80. {$IFC NOT UsingIncludes}
  81.  END.
  82. {$ENDC}
  83.  
  84.